/*
 * Accord Software, Inc.
 *
 * Tutorial 13 - CIDL file.
 *
 * send union, return int
 */


#include "union.h"

int
printuval(p)
	struct primitives *p;
{
	printf("utype = %d, ", p->utype);

	switch (p->utype) {
	case 1:
		printf("ival = %d\n", p->u.ival);
		break;
	case 2:
		printf("sval = %d\n", p->u.sval);
		break;
	case 3:
		printf("lval = %d\n", p->u.lval);
		break;
	case 4:
		if (p->u.pval)
			printf("pval = %s\n", p->u.pval);
		break;
	case 5:
		printf("dval = %f\n", p->u.dval);
		break;
	default:
		printf("defaulted\n");
		break;
	}
	
	return (p->utype);
}